** FIGURE D6


graph drop _all
* pccount picture * 
clear
use "$P_Data_Processed/pccount_breaks_diesel.dta"
format wdate %tw
histogram wdate, color(gray) percent xtitle("Date") name(pccount_hist) title("(a) Number of Price Changes",size(medsmall))

* pcresponse picture *
clear
use "$P_Data_Processed/pcresponse_breaks_diesel.dta"
format wdate %tw
histogram wdate, color(gray) percent xtitle("Date") name(pcresponse_hist) title("(b) Rival Response Time", size(medsmall))

graph combine pccount_hist pcresponse_hist, iscale(1) xsize(10)
graph export "$P_Figures/Figure_D6.eps", replace 
